home *** CD-ROM | disk | FTP | other *** search
/ Champak 132 (Alt) / Vol 132.iso / games / kickups.swf / scripts / DefineButton2_39 / BUTTONCONDACTION on(press, keyPress Enter).as
Encoding:
Text File  |  2011-06-09  |  1.8 KB  |  78 lines
  1. on(press, keyPress "<Enter>"){
  2.    set("/:myname",eval("../:my_name"));
  3.    if(eval("../:my_name") eq "")
  4.    {
  5.       set("../:my_name","Anon");
  6.    }
  7.    if(wordbank.substr("1","1") ne ",")
  8.    {
  9.       wordbank = "," add wordbank add ",";
  10.    }
  11.    comma = "0";
  12.    r = length(wordbank);
  13.    count = "1";
  14.    while(r >= count)
  15.    {
  16.       if(wordbank.substr(count,"1") eq ",")
  17.       {
  18.          comma += "1";
  19.          set("num" add comma,count);
  20.       }
  21.       count += "1";
  22.    }
  23.    count = "1";
  24.    while(comma >= count)
  25.    {
  26.       set("bad" add count,wordbank.substr(eval("num" add count) + "1",eval("num" add (count + "1")) - eval("num" add count) - "1"));
  27.       count += "1";
  28.    }
  29.    badwords = comma - "1";
  30.    short = eval("../:my_name");
  31.    length = length(short);
  32.    l = "1";
  33.    while(length >= l)
  34.    {
  35.       set("w" add l,ord(short.substr(l,"1")));
  36.       if(eval("w" add l) >= "65" and "90" >= eval("w" add l))
  37.       {
  38.          set("w" add l,chr(eval("w" add l) + "32"));
  39.       }
  40.       else
  41.       {
  42.          set("w" add l,chr(eval("w" add l)));
  43.       }
  44.       l += "1";
  45.    }
  46.    l = "1";
  47.    short = "";
  48.    while(length >= l)
  49.    {
  50.       short = short add eval("w" add l);
  51.       l += "1";
  52.    }
  53.    m = "1";
  54.    n = length(eval("../:my_name"));
  55.    while(badwords >= m)
  56.    {
  57.       if(n >= length(eval("bad" add m)))
  58.       {
  59.          v = "1";
  60.          while(n - length(eval("bad" add m)) + "1" >= v)
  61.          {
  62.             if(short.substr(v,length(eval("bad" add m))) eq eval("bad" add m))
  63.             {
  64.                set("../:my_name",eval("../:word_replacer"));
  65.             }
  66.             v += "1";
  67.          }
  68.       }
  69.       m += "1";
  70.    }
  71.    tellTarget("../")
  72.    {
  73.       call("submitscore");
  74.       gotoAndStop("aftergame");
  75.       play();
  76.    }
  77. }
  78.